Glossary Item Box
'====================================================================== 'Сообщить имя текущего приложения MsgBox ThisApplication.ApplicationName '======================================================================